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ABSTRACT 



The EA-6B Mission Planning and Route Optimization Program 
was created for use with the WANG 2200 computer system by 
aircreuTiien deployed on board aircraft carriers. It is an 
interactive computer program designed to increase the effec- 
tiveness and efficiency of the mission planning process, 
while reducing the time involved in this evolution. These 
goals are accomplished through the use of two schemes. First 
is an automation of the clerical planning tasks of retrieval, 
listing, and plotting of information. Second is an optimiza- 
tion routine designed to aid in the selection of the optimum 
EA-6B route of flight, when in a Modified Escort role. 
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I. IiNTRODUCTION 



Many exercises or problems that have previously been 
tediously solved by man directly may now be dealt with by 
small, readily available, economically efficient computing 
devices. Airborne electronic warfare mission planning is 
this type of exercise. In recent years this already time- 
consuming and exacting process has become increasingly complex 
due to the high degree of sophistication of electronic warfare 
weapons systems and the threats they must deal with. Powerful 
state of the art airborne computers are used with these weapons 
systems to aid the Electronic Warfare Officer in performing 
his mission. However, until this time, no automated interface 
has been utilized to correlate the vast amounts of data that 
must be considered in the mission planning process if effective 
weapons system utilization is to be achieved. 

Electronic warfare mission planning lends itself readily 
to solution by interactive computer programming. Initial 
stages of mission planning involve the collection of informa- 
tion from a variety of sources, including TACMANUALS, Elec- 
tronic Orders of Battle (EOB) , Kilting lists, radar handbooks, 
etc. From this information, charts are marked showing EOB, 
route of flight, and emitter detection envelopes. Detailed 
data lists and time logs must also be made before the operator 
can effectively determine, through the use of cumbersome jam- 
ming effectiveness equations of dubious applicability and 
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personal expertise, the optimum course of action for the 
mission. This procedure routinely can take many hours to 
effectively reach a solution. However, due to the nature 
of strike planning, the luxury of these extended time periods 
is not always available and corners have to be cut. The 
inefficiency in this process is obvious, and can, under cer- 
tain circumstances, be unaffordable. 

Any or all of these steps in the electronic warfare mission 
planning process can be greatly simplified through the use of 
a combination of current computer hardware and interactive 
software. Depending on the degree of automation, it is con- 
ceivable that mission planning time could be reduced by a 
factor of ten with more accurate results than possible by 
hand. 
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II. BACKGROUND 



Initial research into the automation by computer of the 
electronic warfare mission planning process was completed in 
June 1977 [1, 2J . Each of the papers resulting from this 
research dealt with a particular section or facet of the 
mission planning process. 

In Beaudet [1], computer software was developed which 
automates many of the initial processes of electronic warfare 
mission planning. In his development, Beaudet has utilized a 
series of operator- computer interfaces which, while greatly 
helping to eliminate a substantial portion of the mission 
planning drudgery, still keeps the planner integrally involved 
in and aware of every step of the planning process. This 
technique of interactive programming is completely essential 
in any mission planning program. 

Specifically, the ”EA- 6B Mission Planning Program" [1] is 
designed to accomplish the following: 

1) Based on entered latitudes and longitudes, plot a 
strike route of flight, 

2) Produce a complete printout of the area EOB based on 
information from step 1, 

3) Visually present various emitter detection envelopes 
and the route of flight based on steps 1 and 2, 

4) Compute and print out hard copies of the complete 
navigation solution and threat emitter reaction 
information, including minute-by-minute range and 
bearing to emitters within detection range. 
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This simulation was accomplished utilizing the following 
hardware : 

1) IBM 360/67 general purpose computer, 

2) TEKTRONIX 4012 graphics terminal (30/12 system) , 

3) TEKTRONIX 4610 hard copy printing unit. 

FORTRAN computer language was used in this program, which 
consisted of approximately 800 steps and 10k of computer 
memory . 

It is important to notice that this simulation does not 
completely address the mission planning problem. That is, 
while much of the initial collating, sorting, and plotting 
work has been automated, the operator still must make the 
crucial decisions to determine the flight route providing 
the most effective jamming. While it is true that in many 
cases the optimum EA-6B route will be obvious from informa- 
tion presented by this program, when the solution is not 
obvious large amounts of time and effort, not always avail- 
able, are required to make the proper decisions. 

In Ref. [2], Watts deals with the problem of determining 
an optimum route for a jamming aircraft. In this paper, he 
presupposes a Modified Escort route for the jamming aircraft 
and bases his simulation on this supposition. In this type 
of mission, the electronic warfare aircraft accompanies the 
strike group only in areas of low exposure to enemy threats. 
This type of route, in general, increases the survivability 
of the Electronic Countermeasures (ECM) aircraft, but decreases 
the jamming effectiveness when compared with a direct accompan- 



iment role. 
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Watts' simulation determines an optimum route by calcu- 
lating the point \\?here the strike group exposure to threats 
is greatest. For this position and time, an optimum position 
for the jammer platform is computed within certain constraints. 
Next, it computes a route to and from this point, which in 
theory approaches the absolute optimum route. In actuality, 
the simulation calculates several optimum routes, each with 
its own measure of effectiveness (MOE) , and presents them to 
the operator allowing him to make a choice based on his own 
expertise and the MOE's. 

It is obvious that these two theses, which have provided 
some of the background for this research, have attacked the 
problem of airborne electronic warfare mission planning from 
ti\'o diverse approaches. Reference [1] has sought to automate 
much of the plotting, listing, and collating of information 
necessary in the mission planning process. Reference [2] has 
tried to eliminate the difficult and time consuming processes 
required in determining an optimum ECM route to fly when 
protecting a strike group. 

It would appear that the logical solution to the mission 
planning quagmire lies somewhere in a compromise between or 
combination of the two approaches. This is the premise from 
which this research was begun. 
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III. DESIGN CONSIDERATIONS 



The primary objective in the creation o£ this program was 
to create an effective automation of the mission planning 
process, utilizing existing assets on board U.S. aircraft 
carriers. Accuracy, speed, simplicity, cost effectiveness, 
and direct user interface were the primary design goals. The 
limitations of existing hardware assets played a significant 
role in many facets of the design. The final mission planning 
system developed exhibits the influence of these factors. 

In the development of the program, it ivas paramount that, 
to as great an extent as possible, existing equipment on board 
U.S. carriers be used. Most computer systems on board the 
carriers are either inaccessible to EA-6B squadron aircrews 
or presently so overvv'orked that usage would be impractical. 
However, all carriers are now or soon will be equipped with 
a WANG 2200 computer system. Included in this on board system 
are the following: 

1) Central processing unit (CPU) of 16k capacity, 

2) Video display unit, 

3) Flexible disk auxiliary storage unit utilizing 
250k disks, 

4) High speed hard copy printing unit. 

This equipment is located where easy access and use by 
EA-6B aircrew personnel is possible. All software in this 
mission planning and route optimization program has been de- 
signed for use on this system. 
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In its design, the goals o£ this program were divided 
into two distinct areas: 

1) Automation of the clerical functions of planning 
Ci.e., sorting, plotting, listing, etc.) 

2) Optimization of the jamming problem. 

Initially, the first objective was to have been accom- 
plished by simply converting Beaudet's "EA-6B Mission Planning 
Program” [1] to BASIC computer language, for use with the WANG 
system. However, due to the increased size of this program 
when converted to BASIC, and the limited core size of the WANG 
machine, it was necessary to completely restructure this 
program for efficient use with the WANG system. 

The resulting program is one which utilizes the WANG 
flexible disk system to "page” itself in and out of the com- 
puter's core memory. Specifically, what was done was to di- 
vide the program into several logical sections. The first of 
these sections consisted of information that must remain within 
the central processing unit (CPU) at all times, such as vari- 
able definitions and constants used throughout the program. 
Initially, only this first section of programming is loaded 
from the disk into computer memory. As the program progresses, 
the various other sections are moved in and out of core memory, 
one at a time, as they are called for. 

This process of overlaying parts of the program on top of 
a section of permanent core resident code effectively increases 
the apparent size of the WANG CPU memory from 16k to whatever 
size is necessary. The penalty for this is obviously an 
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increase in the running time of the program caused by the 
additional time required to bring information in from the 
flexible disk system more than once. However, this fully 
automatic process, due to the nature of the disk system, is 
a very rapid one. The increase in running time is minimal. 

The sequence of events and overall results of this section 
of programming closely resemble those of [1] . To this section 
of this program, however, was added an optimization of the 
jamming problem for the Modified Escort mission profile. 

Computer optimization of the jamming problem consists of 
finding the optimum route to fly to maximize jamming protec- 
tion for a strike group. The three types of strike support 
missions that EA-6B aircraft generally fly are Standoff, 

Escort, and Modified Escort. Of these, the Modified Escort 
mission profile is best suited for a route optimization. 

In view of the core size problems already encountered 
with the automation of clerical tasks, it was obvious that 
the type of optimization done in the "Electronic Warfare Sup- 
port Jamming Pre-Mission Route Optimization" [2] was not 
possible. Not only is the program quite large (10k in FORTRAN), 
but, because of the large number of calculations it performs, 
run time on the WANG system would be excessive. However, [2] 
provided ideas for a simplified optimization routine. 

The one overriding design consideration for the development 
of the optimization was simplicity. The reasons for this are 
tvv'o-fold. First is the obvious problem of a small core-sized 
computer with an already large mission planning program. 
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The second reason is not so obvious and concerns itself with 
the parameters for optimization. 

Any optimization is based on some measure of effectiveness 
(MOE) as the governing parameter. The MOE for jamming has, 
for many years, been the jamming to signal (J/S) equation. 
However, with the advent of the highly sophisticated jamming 
modes of the EA-6B, the J/S ratio has been shown to be not a 
totally valid MOE. With this in mind, an optimization based 
on a rigorous application of the J/S ratio was deemed to be 
inappropriate . 

What was developed was a simple optimization based on the 
presence of jamming aircraft in the threat radar beam width, 
distance from the threat radar, strike group position, and 
EA-6B possible positions. It is not stipulated that this 
scheme produces the definitive optimum route for all situa- 
tions involving all types of jamming. Instead, what is 
accomplished is the presentation of a computer designed route 
that approaches the optimum and indicates to the operator 
another possible solution to his problem. 

In view of the storage limitations of the WANG system, 
the mission planning and route optimization program requires 
that certain information be retrieved from one of the ship's 
main computers. The task of developing an interface between 
the ship’s computer and the VIANG system has been assigned to 
the Navy Ocean Systems Center (NOSC) in San Diego. This 
interface, currently under development, is essential to this 
program. 
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Contained in the ship's main computer is current EOB 
information. This information, pinpointing the location of 
various emitters, is sorted with the EA-6B Parameter Library 
file, contained on the WANG flexible disk. The result of this 
sort is the EOB listing, containing the following information: 

1) Site number, 

2) Latitude and longitude of each emitter, 

5) Threat type, e.g.. Spoon Rest or Barlock, 

4) Frequency band and frequency range of emitter, 

5) Emitter function, e.g.. Early Warning or Missile Control, 

6) PRF range, 

7) Automatic and manual jamming codes for use against 
the emitter, 

8) Percent of frequency band- of the emitter. 

The retrieval of information from the ship's computer is 
designed to be a fast and simple one. Very little ship's 
computer CPU time is used in this exchange. 
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IV. SYSTEM DESCRIPTION 



EA- 6B Mission Planning and Route Optimization Program uses 
the WANG 2200 computer system interfaced with the TEKTRONIX 
4012 graphics terminal. It was written in WANG BASIC computer 
language and, along with associated data, was stored on a 250k 
capacity flexible disk. 

The program is divided into four distinct sections, based 
on mission profile. The missions available are Escort, Modified 
Escort, Standoff, and Modified Escort with route optimization. 
The operator initiates the planning process by selecting one 
of the four profiles for consideration. Selection of the 
profile v^fith route optimization results in slightly different 
user options and procedures from the other three mission. The 
three similar missions will be discussed first. 

Following selection of the mission, the operator enters 
either the strike group route of flight, if known, or simply 
the target latitude and longitude. At this point, using the 
interface with the ship's main computer, a printout of the 
local area EOB is presented to the planner. Subsequently, 
the strike route of flight, location of emitters, and detec- 
tion ranges of emitters are displayed on the graphics unit. 

With this visual display, the optimum jamming route of flight 
may be apparent to the planner, or it may be obscured by a 
complex strike route and dense emitter environment. In the 
latter case, the operator at this time may select the route 
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optimization section o£ the program for computer assistance 
in selecting the jamming route. 

Assuming the planner continues with his originally selected 
mission, he may now enter his EA- 6B route of flight or change 
his strike route to view a different EOB. If he is unsure 
about the best strike route, he may v\^ish to have the computer 
plot several different strike routes with associated EOB' s on 
a transparent overlay. This overlay may then be attached to 
the appropriate chart for presentation to the strike leader 
for his consideration. 

Once the planner has narrowed his options down to his final 
strike and EA- 6B routes, he may obtain a mission chart from the 
WANG drum plotter containing the following information: 

1) Strike group route, 

2) EA-6B route, 

5) Location of EOB emitters, 

4) Emitter detection envelopes. 

He may also obtain from the printer a complete navigation solu- 
tion and Time Scenario for use during his mission. The Time 
Scenario contains information required by the EA- 6B Electronic 
Countermeasures Officer to effectively conduct the mission. 
Included are a minute-by-minute listing of emitters within 
detection range of the strike group and various Tactical Jam- 
ming System (TJS) related information for countering these 
threats . 

With any of the first three missions, the operator has the 
option of selecting and visually considering as many combinations 
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of routes and missions as he desires. However, he alone must 
make all significant planning decisions, resulting in the 
final strike route and/or EA-6B route. The success of his 
choices is based completely on his expertise and insight, 
without computer assistance in finding the optimum route. 

If the Modified Escort mission with route optimization 
is chosen, a strike route of flight must be entered before 
the optimization routine is started. In this mission, the 
EA- 6B accompanies the strike group until it enters a terminal 
threat weapon's envelope. At this point, jamming effective- 
ness calculations begin and determine the direction of flight 
for the EA-6B. 

With the EA-6B position fixed on the terminal threat 
weapon's envelope, a minute-by-minute direction of flight is 
determined based on two factors: 

1) The angle formed by the EA-6B, strike group, and the 
radar, the optimum angle being zero degrees or a 
straight line from the radar to the strike group to 
the EA-6B. 

2) A radar weighting factor assigned on the basis of 
radar type, associated weapons system, and vulner- 
ability to EA-6B jamming. 

These two parameters are computed and summed for radars within 
detection range to determine a measure of effectiveness (MOE) 
given by: 

MOE = Z ^101^ 
i=l ^ ^ 

Where: r^^ = radar weighting factor 

0^ = offset angle 

n = total number of radars considered 
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Each 0^^ term has a maximum default value determined by 
the radar beam width and maximum angle offset for effective 
EA-6B jamming. Once a term reaches its maximum value, it is 
eliminated from the summation. 

The MOE summations are made for several possible EA- 6B 
positions, which are constrained by the flight path and air- 
craft airspeed. The position with the minimum summation value 
is chosen for the optimum jamming position. This process is 
then repeated for the next minute with a new strike group 
position and new EA-6B positions. The final result is the 
optimum route based on MOE calculations and route constraints. 

The operator at this point is presented with a visual 
display of the optimized EA-6B route, strike group route, 
emitter locations, and emitter detection envelopes. He may 
elect, based on this presentation, to alter his strike route, 
default to another mission section of the program, or continue 
with the computed route. If he continues, as in the other 
program sections, he will obtain the complete EA-6B and strike 
group navigation solutions. Time Scenario, and plotted chart 
for the mission. 

From this description, it is evident that regardless of 
which mission is chosen, the mission planner is still the key 
element in the process. His imagination, training, and exper- 
ience must be interactively used with this computer program if 
an effective solution to the mission planning problem is to be 
achieved . 
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V. USER'S GUIDE TO THE PROGRAM 



A. INTRODUCTION 

The following section contains a detailed explanation of 
how to use this mission planning system and the equipment 
associated with it. It is envisioned that the User's Guide 
will accompany the program to the Fleet, facilitating its 
implement at ion . 

B. STARTING THE PROGRAM 

Using the EA-6B Mission Planning and Route Optimization 
Program is not a difficult task. By simply following a few 
simple procedures and answering a few questions, many hours 
of tedious planning can be eliminated. Detailed information 
on procedures for using the V.'ANG computer system can be found 
in [5 and 4] . 

The initial step in using this system is to load the pro- 
gram and the flexible disk containing the program, as in [4] . 

To load section one of the program from the disk into the core 
memory, the operator must type the command, LOAD DC F "MAINl," 
and then push the RETURN(EXEC) button. This is the only load 
command necessary in the entire program. All other sections 
of the program are automatically loaded from the disk as they 
are required. 

The program is started by pushing the RETURN(EXEC) button 
one more time. The program will then ask a series of questions 
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from which it determines how to assist the operator in the 
mission planning process. All (Questions are answered by merely 
typing in the appropriate number for the desired response and 
pushing the RETURN (EXEC) button. 

Under normal circumstances, the planner will have a par- 
ticular mission and strike route to consider when he starts 
planning. For ease in the explanation of the program flow, 
it will be assumed that this is the case. It is, however, 
possible to select these items after viewing the local EOB 
based on the mission's starting point and target. 



C. ESCORT MISSION 

The Escort mission profile is one in which the EA-6B 
accompanies the strike group for the entire route of flight. 

This mission V'/ill be discussed first. 

After the selection of the mission, the operator is asked 
to enter the strike group route of flight, including number of 
turnpoints, latitude and longitude of each turnpoint, airspeed 
on each leg, and local magnetic variation. The system then 
calculates a geographic window around this route which is passed 
to the ship's main computer. Based on this window, the ship's 
computer returns positions and types of local threat emitters. 
This information is then sorted with the Emitter Parameter 
Library contained on the flexible disk. The result is the EOB 
listing pertinent to the mission. At this time the operator 
has the option to add additional information or sites to this 
EOB, or ignore it completely and build his own EOB. 
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Once the EOB listing is completed, the planner has the 
option of obtaining a hard copy of the complete listing or 
of only a portion of the listing based on class of emitter, 

1. e., EW/ACQ or Terminal Threat radars. The listing contains 
various radar parameters that are of particular significance 
to EA-6B personnel, as seen in Fig. 1. 

The operator is now asked several questions related to 
the visual display of the EOB and route information. Through 
these questions he has the option of filtering the classes of 
emitters to be plotted on his display or chart. Once this 
decision has been made, the route of flight, emitter locations, 
and emitter detection envelopes are plotted, as seen in Figs. 

2, 3, 4. At this point, the operator may elect to have the 
plotter transfer this information onto a navigation chart for 
use during the mission. This process will normally take 
several minutes. 

The planner is now given the opportunity to obtain a 
navigation solution and a Time Scenario. The navigation solu- 
tion (Fig. 8) contains the following information: 

1) Distance of each leg, 

2) Time to fly each leg, 

3) True and magnetic headings to each turnpoint, 

4) True airspeed for each leg, 

5) Total time, 

6) Total distance, 

7) Latitude and longitude of turnpoints. 
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The operator is given the opportunity to obtain a hard copy 
of this listing from the printer. I£ he does not want a nav- 
igation solution, he may consider a different route or mission 
at this time. 

The Time Scenario, as discussed in the System Description, 
is a minute-by-minute listing of pertinent EA-6B jamming infor- 
mation. The operator is now asked if he wants a listing of 
this Time Scenario. If he does, the system calculates and 
prints the following information for each minute of the mission 
(see Fig . 9) : 

1) Time, 

2) Present position, 

3) Emitters within detection range, 

4) Correlation number to the EOB listing, 

5) Range and bearing to the emitter, 

6) Automatic and degraded systems jamming modes to use, 

7) Relative percent of Onboard System frequency band of 
the emitter. 

The information listed here must be at the disposal of 
EA-6B aircrew personnel during a mission for immediate reaction 
to threat radars. Previously, this information was pains- 
takingly extracted from a variety of sources before each mission. 
Only with this detailed information available during a mission 
can the EA-6B systems operator hope to cope with the unexpected 
events and confusion which takes place during a strike mission. 

At this point in the planning process, the operator is 
asked if he wants to consider another mission or strike route. 
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If he is satisfied v^^ith the solution he has obtained, he 
simply answers "no" to these questions and the program stops. 

D. STANDOFF MISSION 

A Standoff jamming mission is normally one in which the 
EA-6B stays in a particular fixed orbit while the strike group 
ingresses to a target. During this time, the EA-6B concen- 
trates its jamming primarily on EW/ACQ radars to mask the 
route and composition of the strike group. EA-6B jamming 
effectiveness against narrow beam missile control radars is 
less than completely effective when not in alignment with the 
strike group and emitter. During this time, the EA- 6B will 
normally proceed to another optimum jamming point and fly a 
fixed orbit. From this orbit, jamming will be provided to 
effectively cover EW/ACQ radars during the egress portion of 
the strike route. 

This program allows the operator a chance to rapidly view 
the effects of his jamming from several different standoff 
points during the planning session. In viewing different 
standoff points, he should be able to chose the position or 
positions which will provide the desired jamming protection 
for ingress and egress of the strike group. 

Once the mission has been selected and strike route 
entered, the program asks for the latitude and longitude of 
the standoff point. It will normally suffice to enter the 
midpoint of the first standoff orbit. The system will now 
display the strike route, EOB emitter sites and detection 
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envelopes, and the EA-6B standoff point. As with the Escort 
mission, the operator has the ability to filter the emitters 
displayed by class. With the Standoff mission only, the 
planner may also elect to see the emitter detection envelopes 
depressed by his jamming as in Figs. 5 and 6. This feature 
enables him to rapidly assess the effectiveness of jamming 
from several different locations, leading to the selection 
of one or more standoff points for the mission. 

Once the planner is satisfied with the display he has 
constructed, as before, he may transfer the display information 
to a chart via the plotter. The navigation solution and jam- 
ming parameters for use in flight, as seen in Fig. 11, may now 
be printed, concluding the planning of this particular mission. 

The success of the Standoff mission lies primarily in the 
selection of the optimum standoff points. With the aid of 
this system, the planner is able to rapidly view many different 
standoff points, resulting in near optimum positioning of the 
EA- 6B. 

E. MODIFIED ESCORT MISSION 

A Modified Escort mission is one in which the EA- 6B accom- 
panies the strike group until the point where the strike group 
must penetrate a AAA or SAM envelope. At this point, the 
EA-6B takes up a course outside of the weapons envelopes. In 

an environment of sophisticated home-on- jam (HOJ) missiles, a 
modified escort role seems a likely possibility for jamming 
aircraf t . 
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Once the mission has. been selected and the strike route 
entered, as before, the operator may enter the EA-6B route. 
However, it is envisioned that normally the planner will first 
view the EOB listing and the display of EOB emitter locations, 
emitter detection envelopes, and strike route. Based on this 
information, he can now intelligently chose and enter the 
EA-6B route. 

When this is accomplished, the EA- 6B route is added to 
the visual display as in Fig. 7. As before, the operator may 
have his chart marked with this information or consider another 
strike route or routes. A navigation solution and Time Sce- 
nario are again available at this point. Figure 8 shows the 
navigation solution containing both strike group and EA-6B 
information. The Time Scenario for the Modified Escort mission 
is seen in Fig. 10. It considers both strike group and EA-6B 
position, and lists emitters accordingly. As with all other 
missions, at this point in the program the operator may select 
a new mission profile, change the route, or merely terminate 
the planning session. 

F. MODIFIED ESCORT MISSION WITH ROUTE OPTIMIZATION 

Results obtained in this section of the program are likely 
to be very similar to those of the Modified Escort section. 

In this section, however, the computer makes some important 
decisions for the planner. 

Once the mission is selected, the strike route of flight, 
including turnpoints, speeds on each leg of the route, and 
local magnetic variation, must be entered. As in all other 
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sections, the EOB listing is now created utilizing the inter- 
face with the ship's main computer, the Emitter Parameter 
Library, and operator inputs. This listing is available to 
the operator for viewing and printout at this point in the 
program. 

The planner is next asked to enter the minimum and maximum 
EA- 6B airspeeds he wishes the computer to use in the optimiza- 
tion routine. With the input of this information, the program 
automatically enters the routine and computes an optimized 
EA-6B route based on the calculations and constraints outlined 
in the System Description section. 

When the route is completed, the system plots the optimized 
EA-6B route, strike route, terminal threat radar positions and 
detection ranges on the graphics terminal. The operator has 
the option of adding EW/ACQ radars to the display before he 
has the display plotted on his chart. At this point in the 
program, the planner may change the strike route and re- 
initiate the optimization routine, change his mission, or 
continue with what he has done. 

Assuming the planner was satisfied with the display, fdllow- 
ing the preparation of the chart, he may list and print a navi- 
gation solution and Time Scenario identical to those of the 
Modified Escort mission (Figs. 8 and 10). At this point, the 
operator is again given the opportunity to change his route, 
mission, or terminate the planning session. 
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In the dense emitter environment of many areas of the 
world, computer assistance in the selection of an optimum 
jamming route is essential. Use of the Modified Escort mis- 
sion program section in such an environment would be extremely 
time consuming, requiring the planner to view many different 
EA-6B routes before being able to intelligently decide on a 
route. With the route optimization section implemented, under 
such conditions planning time would be reduced and far more 
accurate results would be achieved. 
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Figure - 2 Visual presentation for an escort mission poofile with 

ONLY terminal threat (FI°£ CONTRGLj MISSILE CONTROL) EMITTER DETECTION FlOURE - 3 VISUAL PRESENTATION FOR AN ESCORT MISSION PROFILE WITH 

E.r/ELOPES DISPLAYED. SiTE LOCATIONS AND ROUTE OF FLIGHT fi ^^L EMITTERS AND THEIR DETECTION ENVELOPES PRESENTED. SiTE LOCATIONS 

ARE SHOWN. The scale indicates LAT/lONG WITH THE CONVENl ION n/S = A.ND ROUTE OF FLIGHT 1 ARE SHOWN. AND THE SCALE INDICATES 

AND E/w * ♦/-. LAT/LONG WITH THE CONVENTION N/S = AND E/W * +/“. 




Pirttpp - Visual presentation for an ESCORT MISSION profile with 

oify larl? Warning?1\cquisition type radar detection 
Site locations and route of flight — 7 ^~/ ♦/- 

indicates lat/long with the convention n/S - and e/w / . 





Figure - c Snot.’s stmke okcup route ^ standoff jammer position • 

PVACG emitter envelopes .'NJAfJ^ED (solid LliCS) AND JAMMED (DASHCd" 
LINES). 
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Figure - o This is a listing of the strki group and EA-GE 
IAvAL solutions for a modified escort mission. 



Figure - 7 Shows strike group »oute e. EA-6B route and terminal 
threat emitter envelopes (not jammed). 
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Figure - 11 Jamming parameters for a standoff mission from 

ORBIT POINT INDICATED. 
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VI. FUTURE CONSIDERATIONS 



A, INTRODUCTION 

Due to equipment restrictions, many features that would 
be nice to have in a mission planning program are not included 
in this system. Without great modifications to the existing 
program, all items discussed in this section could be incor- 
porated, expanding the features and versatility of this system. 

B. HARDWARE 

If the WANG 2200 computer system is to continue to be the 
basis for EA-6B mission planning, procurement and utilization 
of the newly developed WANG Interactive Graphics Terminal is 
advisable. Not only are interface problems, novvf present with 
the TEKTRONIX 4012, avoided with this display system, but the 
speed in creating necessary displays is substantially increased. 

The WANG computers used onboard carriers and the one used 
for development of this program have 16k of CPU memory. With 
only slight hardware modification and minimal cost, this memory 
can be increased to 64k. If this mission planning program 
is to be expanded and improved, it is vital to have the in- 
creased core size available. 

Should a dedicated computer system become available for 
EA-6B mission planning, consideration should be given to all 
manufacturers of computing systems with similar capabilities 
to the WANG 2200. Included in this category are the HEWLETT 
PACKARD 9845 and the TEKTRONIX 4051 computer systems. 
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Each system has specific advantages which must be fully 
investigated before any choice is made. 

C. SOFTWARE 

The Emitter Parameter Library and ship's computer inter- 
face could be modified to produce an EOB listing with infor- 
mation on specific weapon platforms. Information on ships 
and aircraft of interest could be displayed and printed, as 
in Fig. 12. This procedure would not involve a significant 
increase in computer calculations. 

Expansion of the optimization aspect of this program seems 
inevitable. In spite of the limited CPU memory size of the 
WANG machine, a simple optimization of the Standoff mission 
is possible. In this routine, jamming effectiveness calcula- 
tions could be used to determine optimum standoff positions 
for strike group protection. Many sections of programming 
currently in the system could be used in this scheme. 

Programming to determine the strike route v\fith the minimum 
amount of exposure to enemy radars could easily be added to 
the existing system. A procedure which examines several pos- 
sible strike routes and calculates exposure times and trends 
could be used to implement this feature into the program. 
Combining this routine with jamming route optimization could 
lead to a complete automation of the mission planning process. 
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APPENDIX A 



EA-6C MISSION PLANNING AND ROUTE OPTIMIZATION PROGRAM 
PROGRAMMED IN WANG 2200 SASIC LANGUAGE 



PART ONE "MAINl" 

10 RcA MAIN PROGRAM FOR EA68 MISSION PLANNING 
20 DIM Xl( 10) ,Y1( 10) , SI (20) ,S2(20) , S6 (20) ,D1 ( 9) ,S3(<3) , T2 (9 ) , 
N2(9 ) ,M3 (9 ) , 21 (9) ,T4 ( 120) ,c4 (2 J) , T2( 9 ), D4( 9 ) »M 1 ( 3) ,T8$( 30 
) 12,T1(30) 

30 DIM T7S(30)36, Y2(9) , X2( 9) ,M2( 9) , S5 (9) ,?2(9 ) , B ( 30) ,G1 (30) , 
Pl( 30) ,G2( 30 ) , T6(9 ) , T5 ( 9) , D2 (9 ) , 03(9 ) ,N3( 9) , Ml ( 9) , T9S ( 30, 
11)4,Z9(20) ,Z8(20) ,81(10) 

40 REM STK GROUP CROSS SECTION = C 
50 C=9. 

60 C9=l . 

70 REM CMFLG FACTOR USED IN BURNTHRU 
80 Y8=3C0. 

90 X9=300. 

100 REM SET LIMITS TO BEGIN GEOGRAPHIC SEARCH LIMIT 
110 PRIfiT "FOR ALL GUSSTIONS: ENTER 1 FOR YES, 0 FCR NO." 
120 I4FUT "03 YOU WISH TO CONSIDER A OARTICULAR MSN PROFILE 
AT This TIME?",M7 
130 IF ?-'7=0 THEN 150 

140 INPUT "WHICH MISSION? 1=ESC0RT, 2=MCD ESCORT, 3=STAN00F 
= .1 , ,v 7 

150 INPUT "00 YOU HAVE A STRIKE ROUTE AT THIS TIME?",LS 
ISO IF L3=l THEN 310 

170 N=2-'RSM n3 ROUTE YET US: APPROX. PCINT 

180 INPUT "ENTER APPROX. STARTING LAT , LONG" , Y 1 ( 1 ) , XI ( 1 ) 

190 INPUT "ENTER TARGET LAT , LONG" , Y1 ( 2 ) , X 1 ( 2 ) 

200 FOR 1=1 TO 2 
210 Z8(I)=Xl(i) 

22 0 Z9 ( I ) =Y1 ( I ) 

230 NEXT I 
240 Zl=2 

25 0 GOSL0 '200: = EM CONVERT DEG AMO MIN TO DEG AND T::NTHS 
260 FOR 1=1 Tn 2 
270 XI (I ) =Z3( I ) 

230 VI ( I ) = Z9( I ) 

290 NEXT I 
300 GOTO 510 

310 INPUT "ENTER NUMBER OF TURNPTS.",N 
320 M=N-1 

330 =jR 1=1 TO N:REM READ IN TURNPT. LAT, LONG 
340 PRINT "EN'^’ER LAT, LONG OF TURNPT.";! 

350 I JPUT Y1 ( i ) ,X 1 (I ) 

3o0 Z3 ( I ) =X1( I ) 

370 Z9(I )=Y1( I ) 

330 NEXT I 
390 Z1=N 

400 GJSL3 '200:REM CONVERT qeg AND MIN TO DEG AND TENTHS 
410 FOR 1=1 "^0 N 
420 XI ( I )=Z8( I ) 

430 Y1 ( I ) =Z9( I ) 

440 N=XT T 

450 INPUT "ENTE? MAG VAR., + FOR 'WEST, - FOR EASi",V 
460 =0R T=i TO N :REM ENTER TAS EACH LEG 
470 PRTNT "ENTER TAS FCR EACH LEG.";I 
480 INPUT 11(1) 

490 S3 ( I ) = II ( I ) /6 0. :REM NM PER MINUTc 
50C NEXT I 
510 FOR 1 = 1 TO N 
52 ) Z9 ( I )=X1( I ) 

530 NEXT I 
540 Z1=N 
550 GOSUB '215 
560 F=Z2 








I 




570 
580 
59 J 
600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
70 0 
900 
910 
9 20 
930 
940 
950 
960 
97 J 
980 
990 
100 J 
1010 
1020 
1030 
1040 
105 0 

1060 
107 0 
1030 
1090 
110 0 
1110 
1120 
113 0 
114C 
1150 
lloC 
1170 
1130 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
126 0 
1270 
1280 
1290 
130 0 
1310 
1320 
1330 
1340 
6170 
6130 

619 0 

620 0 
6210 

622 0 
6220 
6230 
624 0 
62 5 0 



G0SU3 '215 
F9 = Z2 

FOR 1=1 TO N 
Z9 ( I ) =Y 1 ( I ) 
NfXT I 
Zl = iN 

C-OSUB '210 
T = Z2 

GJSL5 '215 

39 = Z 2 

T=T+2. 

B9=09-2. 

F=F+2. 

F9=F9-2. 

FDR 1=1 TO N 
Z3( I )=S1 ( I) 
Z9(I J=S2( I) 
N3XT I 
Zl=i< 

GO SUB '200 : 



R5M CONVERT DEO Ai>ID MIN TO DEG AND TENTHS 



SI ( I ) =Z8( I ) 

S2( I )=Z9( I ) 

NEXT I 

IF L3=0 THEM 1340 
IF M7=0 then 1340 
ON ,M7 GOTO 1340,1030,1250 
INPUT "DO YOU HAVE A MOO ESCORT ROUT 
IF ,M6=0 THEN 1340 
INPUT "ENTER NUMBER OF TURNPOINTS IN MOD PSCGR 



□ ENTER N0W?",M6 



ROUTE . 



FOR 1=1 TO M9 

PRINT "ENTER LAT,LONG FOR TO RNP 0 I NT . " , I 
INPUT Y2( I ) ,X2(I ) 

Z8 (I ) =X2 (I ) 

Z9( I l=Y2(i ) 

NEXT I 
Z1=M9 

GGSUS '200 : REM CONVERT DEG AND MiN TO DEG AND TENTHS 
FOR 1=1 TO M9 
X2 ( I ) =Z3 ( I ) 

Y2(I )=Z9(I ) 

NEXT I 

M3=M9-1 

i=OR 1 = 1 TO M8 

PRINT "ENTER TAS FOR LEG.", I 
INPUT M2(I) 

55 (I )=M2( I )/60. 

NEXT I 
GOTO 1340 

INPUT "DO YOU HAVE A STANDOFF PT . TC CQNSICSP YET?",L5 
IF L5=0 THEN 1340 

IN5'.T "ENTER LAT,LONG OF STANDOFF POI NT . " , S 8 , S9 
ZS( I )=S9 
Z9 jl )=S3 

GOSUo '200: REM CONVERT DEG AMD MIN TO DEG AND TENTHS 
S9 = Z8( I I 
sa=z9( I ) 

LOAD DC F "VAIN2" 1341,6160 

'NPUT "ARE YOU THROUGH PLANNING?", L 

IF L=0 THEN 6550 

INPUT "DO YOU WISH TO CONSIDER A DIFFERENT MISSION 
PROFILE?", L 

INPUT^ "WH^C H*"M I S S I ON DO YOU WISH TO CONSIDER? 1=ESCGRT 
?=MOD ESCORT, 3=S T ANDO FF . " , M7 

INPUT "DO YOU WISH TO CUNSIDER ANCTHER STRIKE ROUTE?", 
INPUT "DO YOU WISH TO CONSIDER ANCTHER STPK RTE?",L9 
IF 1.9=0 THEN 6440 

INPUT "CNTER NUMBER OF TU RNPOI NT S , N 
M=N-1 



02i) J 

6270 

6260 

6290 

63 OC 

631J 

632C 

6330 

6 3^0 

6350 

6360 

63 7 C 

633 0 

639 0 

640 0 

6410 

642 0 

6430 

6440 

645 0 

64o 0 

647 0 

6430 

649 0 

6500 

6510 

6520 

653C 

65^0 

654 1 

6550 

656 0 

65 7 0 

6530 

6590 

6600 

6610 

6620 

66 3 0 

6640 

6650 

6660 

6670 

66 8 0 

6690 

6700 

671 0 

6720 

6730 

674 0 

6750 

6760 

6770 

6730 

6790 

6300 

6310 

6320 

6330 

68^0 

6350 

686 0 

6870 

6830 

639 0 



FCR I=l “ 

oRIiNT 

INPUT 




URNPQINT L AT, LONG 



I r vj 1 /\ 1 \ i I 

28 { I ) =X1 ( I) 

29(1 )=Y1 (I ) 

NEXT I 
Z1=N 

GOSUB '200: REM CONVERT D5G AND MIN TQ DEG AND TENTHS 
FOR 1=1 TO N 
XI (I ) = Z8(I ) 

Y1 { I)=Z9( I ) 

NEXT I 

FOR 1=1 TO M: REM ENTER TAS EACH LEG 
PRINT ’’ENTER TAS FOR EACH LEG."; I 

INPUT urn 

S3 ( I ) =I 1 ( I ) /609 : REM N.M. PER MINUTE 

NEXT I 
L8 = l 

ON M7 GOTO 6540,1030,6450 

INPUT "DO YOU WANT TC CONSIDER ANOTHER STANCGPF POINT? 
",L5 

i F L5=0 THEN 6170 

INPUT "ENTER LAT,LONG OF STANDOFF POINT S8 , S9 
Z3 ( I )=S9 
Z9 (I )=S3 
Zl = l 

GOSUB *200: REM CONVERT DEG AND MIN TO DEG AND TENTHS 
S9=Z3( I ) 

S3=Z9( I ) 

V7=999 

LOAD OC F "MAIN2" 

STOP 

DEFFM'246 : REM RAON THIS SUBROUTINE CONVERTS TRUE 
HDG FROM DEGRESS TC RADIANS FOR USE IN COMPUTING THE 
DISTANCE INCREMENT OF LAT,LONG IN THE TIMS SCENARIO. 
21=2.==#? 1/360. 

IF N2( I ) GE .0 THEN 6610 
H= (450-N2( I ) )==Z1 
RETURN 

IF N2( I ) LE. 90 THEN 6630 
GOTO 6590 
H = (90-M2( I > )=!*Z1 
RETURN 

DEFFN’248 : REM SAME AS *246 
21=2. -#P 1/360. 

I F N3( J) GE. 0 then 6700 
H= (450-N3(4) )*Z1 
RETURN 

IF N3(J) LE. 90 THEN 6720 
30TC 6630 
H=(90-N3(J) )-21 
RETURN 

OEFFM’225 : REM TD THIS SUBROUTINE COMPUTES THE TIME 
AND DISTANCE AROUND A PARTICULAR RCUTE, BOTH TOTAL AND 
INCIVIDUAL LEG VALUES. 



OKI ) = SQR(24 2 + 25 2) 
Did ) = D1 (I )-60. 
22=22+01 ( I ) 

D4.( I )=22 

T3( I)=01( I )/S3( I ) 
21=21+T3 ( I ) 

T2( I )=21 
NEXT I 
RETURN 




22 = 0 . 
21 = 0 . 



MIN THIS SUBROUTINE IS USEC TC FIND 
A LIST PASSED TO IT. 



5900 DEFFN'235 : REM TC SAME AS *225 
6910 Z1=0. 

692C Z2=C. 

6930 FOR 1=1 TO M8 : REM CALCULATE SDF 

6940 Z3 = 1.0294-.0C23=:<A3S( ( Y2( I + l) +Y2 ( I ) ) /2 . ) - . 000 !=!« ( ( Y2 ( I + 1 ) 

+ Y^( I ) )/ 2. ) 2 

6950 Z4 = (X2(I+1)-X2( I ) )’!*Z3 
6960 Z5=Y2( I+l)-Y2( I) 

6970 D2(I)=SQR(Z4 2+Z5 2) 

6980 D2(I )=D2( I )-60. 

6990 Z2=Z2+D2 ( I ) 

7000 03(I)=Z2 

701C T6( I ) = D2 (I)/55{ I ) 

7020 Z1=Z1+T6(I) 

7C3C T5(I)=Z1 
7040 NEXT I 
7050 RETURN 

7060 0£FFN'210 : REM MAX THIS SUBROUTINE IS USEC TO FIND 
THE MAX VALUE OF A LIST PASSED TO IT. 

7070 Z2=Z9(I) 

7030 FOR 1=2 TO Z1 

7090 IF Z9(I) LE. Z2 THEN 7110 

7100 Z2=Z9( I ) 

711C NEXT I 
7120 RETURN 
7130 DEFFN*215 : REM 
THE MIN VALUE OF 
7140 Z2=Z9(I) 

715C FCF 1=2 TO Z1 

7160 IF Z9(I) G5. Z2 THEN 7180 

717C Z2 = Z9( I I 

7130 NEXT I 

7190 RETURN 

7200 DEFFN'220 : REM SCALE THIS SUBROUTNE TAKES THE MIN AND 
MAX VALUES OF X AND Y COORDS, AND ADJUSTS TO MAKE PLCT 
ON GRAPH ALWAYS SQUARE. 

7210 Z1=ASS(X6-X9 ) 

7220 Z2=ASS(Y9-Y3 ) 

7230 IF Z1 GE. Z2 THEN 7230 
724C Z3=X9+(Zl/2. ) 

7250 X9=Z3-(Z2/2. ) 

726C X6=Z3+(Z2/2. ) 

7270 GOTO 7310 
7230 Z4=YS+(Z2/2. ) 

7290 Y6=Z4-(Zl/2. ) 

7300 Y9=Z4+(Zl/2. ) 

731C RETURN 

7320 DEFFN'230 : REM HDG THIS SUBROUTINE COMPUTES TRUE AND 
MAG HOG FOR A ROUTE OF FLIGHT. 

7330 Z1=180./#PI 

734C FOR 1=1 TO M ; REM MUST CALCULATE SOF (Z2) SINCE LAT 
NCT EQUAL TC LONG IN OIST. 

73 5 C Z2 = 1.0294-.0023=!=ABS( (Yl( I + li+Yl ( I ))/2.)-.000 1#((Yl(I + l) 
+ Yim )/2. } 2 

7360 Z3=(X1(I+1)-X1(I ) )*Z2 
7370 Z4 = Y1( I+D-Y 1( I ) 

7530 Z5=ARCTAN(Z4/Z3) 

7390 IF Z3 GE. 0. THEN 7420 

7400 Z5 = ( 1.5=?=^PI-Z5) *Z1 

741C GOTO 7430 

7420 Z5=(#PI/2.-Z5)«Zl 

7430 n2(I )=Z5+.5 

744C M3( I ) = N2 (I ) + V 

7450 Z6=M3( I) 

746C IF Z6 GE. 0. THEM 7490 
7470 M3( I)=M3(I ) + 360. 

7480 GGTC 7510 

7490 IF Z6 LT. 36C. THEN 7510 
7500 M3(I )=M3 (I )-360. 

7510 NEXT I 

7520 RETLRN ^ ^ , 

7530 DEFFN'24C : REM CALCULATE SOF (Z2) 



754C 


Zl = 180./AtPI 






755 J 


FOR_I=l TO M8 : R£P CALCULATE SDF (Z2). 






75 6 C 


42=1. 0294-.0 023* ABS ( (Y2( I+l) +Y2 (I)J/2.)-.0001*((Y2(I+l) 




+ Y2( I J J/2. ) 2 






7570 


Z3 = (X2( I +1 )-X2( I ) ) *Z2 






7580 


Z4=Y2( I+l)-Y2( I) 






7590 


Z5=ARCTAN(Z4/Z3 ) 






760C 


IF Z3 Gc. 0. THEN 7630 






7610 


Z5=( 1.5*#PI-Z5) *Z1 






762C 


GOIG 7640 






7630 


Z5 = (i^PI/2.-Z5)*Zl 






764 0 


N3(I)=Z5+.5 






765C 


Mid ) = .\|3 (I ) + V 






7650 


Z6=M1( n 






7670 


IF Z6 G£. 0. THEN 7700 






7680 


MIU )=M1 (I ) + 360. 






7690 


GOK 7720 






7700 


IF Z6 LT. 360. THEN 7720 






7710 


Ml (I ) = M1 (I )-360. 






7720 


NEXT I 






7730 


RETURN 






7740 


OEFFN'200 : REM LL THIS SUBROUTINE CONVERTS 


DEG 


AND 




MIN TO OEG AND TENTHS. 






7750 


FOR 1=1 TO Z2 






7760 


Z2=Z8( I) 






7770 


Z3=Z8( I )-Z2 






7780 


Z3=Z3/ .6 






779 0 


Z8 (I )=Z2+Z3 






7800 


Z4 = Z9( I ) 






7810 


Z5 = Z9 (I )-Z4 






78 2 0 


Z5=Z5/.6 






7830 


Z9(I )=Z4+Z5 






7840 


NEXT I 






785 0 


RETURN 






7860 


DEFFN'205 : REM RLL THIS SUBROUTINE CONVERTS 


CEG 


AND 




TENTHS TO DEG AND MINS. 






787 0 


FCR 1=1 TO Z1 






7880 


Z2=Z8( I ) 






7890 


Z3=Z8 ( I ) -Z2 






7900 


Z3=Z3*. 5 






7910 


zed ) = Z2 + Z3 






7920 


Z4 = Z9( I) 






7930 


Z5=Z9(I ) -Z4 






7940 


Z5=Z5*.6 






795 0 


Z9 m=Z5+Z4 






7960 


NEXT I 






7970 


RETURN 







PART TWO "MAIN2” 



1341 IF V7=99S THEN 2420 

1342 INPUT ”00 YOU WISH TO USE SHIP'S £GB?"»L 
1350 IF L=0 THEN 1550 

1360 R6.M NEXT SECTION USED FOR OBTAINING SHIP'S EG6 
155C INPUT "DO YOU WISH TO ENTER SITES IN ADDITION TO CR 
INSTEAD CF FROM SHIP'S EOB?",L 
156C IF L=0 THEN 1640 

1570 INPUT "HOW MANY SITES ARE YOU ENTERING?", J 

1580 N9=K+J 

1590 K1=K+1 

1600 FOR I=K1 TO N9 

1610 INPUT "ENTER LAT,LQNG TYPE NO . " , S2 ( I ) .S 1N2 ) ,S 6 ( I) 

1620 NEXT I 
1630 K=N9 

lo40 INPUT "DO YOU WISH A LISTING OF THE EOB?",L 
1650 IF L=0 THEN 2420 
1660 FOR 1=1 TO K 
1670 Z&m=Sl(I) 

1630 Z9 ( I )=S2 ( I ) 

1690 NEXT I 
1700 Z1=K 

1710 30SU6 '205:R£M RECONVERT DEG AND TENTHS TO DEG AND MIN 
1720 FCR 1=1 TC K 
1730 31(1 )=Z3 ( I ) 

1740 S2(I)=Z9{I) 

175 J NEXT I 

1760 PRINTUSING 1770 

1770 ? 1=ALL, 2=EW/ACQ, 3=TERM THREAT 

1780 INPUT "CHOOSE TYPE OF EMITTERS TC USE.",L 

1790 ON L GOTO 1800,2030,2200 

1300 FOR 1=1 TO K : REM THIS LISTS ALL EMITTERS 
18 10 J=S6( I ) 

1320 IF 12 NE. 0 THEN 1650 
1330 PRINTUSING 1840 

1340 % MSN BAND LIST RNGE FLO FHI PRFl PRFl PRF2 PRF2 AUTC 
OEGR PRCT 
1850 12=12+1 

I860 PRINT " SI TE";I ;TAB(8 ) ; "L/L" ;S2( I ) ;"/";Sl( I ) 

1370 PRINT TAB(2 );T6$( J) ;TAB(17) ;T7$(J) 

1880 PRINT T9$(J,l);" ";8i(j);" ";T9$(j,2) ";T1(J);" 
T93(j,3);" " ;T9$( J ,4) ; " ";T9$(J,5);" ";T9$(J,6);" 
791(0,7);" " ;T9'5( J ,8) ";T9S(J,S);" " ; T9$ ( J , 10 ) ; " 

T9I( J, 11 ) 

1390 PRINT 
1900 Z8 ( I ) = S1 ( I ) 

1910 Z9 ( I )=S2 ( I ) 

1920 IF 12 NE. 3 THEN 1940 
1930 12=0 
1940 NEXT I 

I960 GCSUB '200 : REM CONVERT DEG AND MIN TO DEG AND TENTHS 
1970 FOR 1 = 1 TC K 
1980 S1(I)=Z3(IJ 
1990 S2( I )=Z9( I ) 

2000 NEXT I 

2010 GCTC 2420 ^ o.,. v, 

2020 REM NEXT SECTION FCR EW/AuQ ONLY 
2030 FOR 1=1 TO K 
2040 J=S6(I) 

2050 IF J GT. 10 THEN 2170 
2063 IF 12 NE. 0 THEN 2080 
2070 PRINTUSING 1840 
70 flO T7^T2 + 1 

2090 PRINT "SITS "; I ; T A3 ( 8 J ; "L/L " ;S2 ( I J ; S 1 ( I ) ; 

2100 PRINT T AB (2 ) ;T8 $ ( J ) ; T AB ( 1 7) ; T 7 $ ( J ) 

2110 PRINT T9$(J,i);" ";B1(J);" ";T9$(j,2);" ";tuj);" "; 
T9${J,3) ;" ";T9$( j,4) ";T9$U,5);" ";T9 $(j,6);" " ; 
T9$(J,7);" " ;T9S( J,8) ";T9$(j,9);" ";T9$( J,10) 



2120 

2130 

2140 

2150 

21fc0 

217C 

2171 

2172 

2175 

2174 

2175 

2176 

218 0 

2190 

2200 

2210 

2220 

2230 

224C 

2250 

226 0 

2270 

2230 

2290 

2300 

2310 

2320 

2330 

2340 

235C 

2360 

2370 

2330 

239 0 

240 0 

2410 

2420 

2430 

2440 

2450 

246 0 

2470 

24 8 0 

2490 

2500 

2510 

25 20 

253 0 

2540 

2550 

25o0 

2570 

2580 

2590 

2600 

2ol0 

262 0 

2630 

264 0 

2650 

266 0 

2670 

2680 

2690 

2700 

2710 



THEN 2170 



REM CONVERT DEG AND MIN TO DEG /SNC TENTHS. 



T9$( J,il ) 

PRINT 

Z8(2)=S1 ( I ) 

Z9(I)=S2(I) 

IF 12 NE. 3 
! 2 = 0 
NEXTI 
Z1=K 

G0SU3 *200 : 

FOR 1=1 TO K 

51 I I ) = Z3 { I } 

S2( I )=Z9(I ) 

NEXTI 
GOTO 2420 

REM THIS SECTION LISTS TERM THREATS ONLY. 

FOR 1=1 TO K 
J=S6( I ) 

IF J LE. 10 THEN 2350 
IF J GT. 20 THEN 2350 
IF J NE. 0 THEN 2260 
PRINTUSING 1840 
I 2=12+1 

PRINT "SITE ";l ;TA6(8 ) ;"l/L " ; S 2 ( I ) ; " ; SI ( I ) ; 

PRINT TA3I2 );T3$( J) ;TAB(17) ;T7$( J) 

PRINT T9S(oa);" ";Bl(j);" ";T9$(Jt2);" ";T1(J);" 
T9$(J,3);" ";T9$(J,4);" ";T9$(Jt5);" ";T9$(Jt6);" 
T9I(J,7) - - - ■ - 

T9$( J,ll ) 

PRINT 
Z3( I ) = S1 (I ) 

Z9 (I j=S2 (I ) 

IF 12 NE. 3 THEM 2350 
I 2 = 0 
NEXT I 
Z1=K 

G0SU3 *200 : -REM CONVERT DEG AND MIN TO DEG ANC TENTHS. 

FOR 1=1 TO K 

S1(I)=Z3(I) 

52 I I J = Z9( I ) 

REM NEXT SECTION TO DISPLAY INFO 

INPUT "DO YCU WISH TO DISPLAY ECB AND ROUTE?", L7 
IF L7=0 THEN 3900 
PRINTUSING 1770 

INPUT "CHOOSE TYPE OF EMITTER ENVELOPES FOR DISPLAY.", 
L6 



";T9$(J,8);" ";T9${J,9);" ";T9S(J ,10) ;" 



IF M7 NE. 3 THEN 2490 

INPUT "DO YCU WANT TO SEE THE ENVELOPES 
JAMMING?", J9 

REM THIS SECTION MAKES GEOGRAPHIC WINDOW 
FOR 1=1 TO N 
Z9 ( I ) =X1 { I ) 

NEXT I 
Z 1 =N 

G0SU3 '210 
X6=Z2 

GOSUS *215 
X9 = Z2 

FOR 1=1 TO K 
Z9( I) = S1 (I ) 

NEXT I 
Z1=K 

GCSUB *210 

IF X6 GT. Z2 THEN 2640 

X6=Z2 

X6=X6+.2 

GOSLB *215 

IF X9 LT. Z2 THEN 2630 

X9 = Z2 

X9=X9-.2 

FOR 1=2 TO N 

Z9( I )=Y1 ( I ) 

NEXT I 



CEPRESSED BY 



2720 

2730 

2740 

275C 

2760 

2770 

2730 

279 0 

2800 

2810 

282C 

2830 

2340 

2350 

23 5 0 

2370 

2880 

2890 

2900 

3900 



21=N 

GGSUB '210 
Y9 = Z2 

GOSUB '215 
Y8 = Z2 

FOR 1=1 TO K 
Z9(I)=S2n ) 

NEXT I 
Z1 = K 

GOSUB '210 

IF Y9 GT. Z2 THEN 2340 
Y9 = Z2 
Y9=Y9+.2 
GOSUB '215 

IF Y8 LT. Z2 THEN 2380 
Y8 = Z2 
YS=Y8-.2 
GOSUB '220 

,R5i^ NEXT SECTION RESERVED FOR PLOTTER CODE 
LO^iO DC F »MAIN3" 1341,6160 




5*^-: 





PART THREE *'MAIN3" 



3901 

3910 

3920 

3930 

3940 

3950 
39o0 
3970 
3930 
399 0 
4000 
40 10 
402 J 
4030 
404 0 
4050 
406 0 
4070 
4030 
4090 
410 0 
411C 
4120 



4130 
4140 
4150 
4160 
^170 
41SC 
419 0 
4200 
4210 
422 0 
4230 
4240 
425 0 
4260 
4270 

4280 
4290 
4300 
4310 
432 0 
4330 
434 0 
4350 
4360 
4370 
4380 
4390 
440 0 
4410 
4420 
4430 
4440 



4460 

4460 

4470 

4480 

4490 

4500 



Tc ROUTE PREVIOUSLY PICKED. 

rnc.1Z'"’?7 7c='^ MISSION PREVIOUSLY PICKED. 

? = calculate time ANC OIST AROLNO ROUTE. 
bOiUo '230 : RcM uALCULATE HEADINGS AROUND i^CUTE. 

cr-MT§Tr.’’'n'^7 ^ SOLUTION? IT'S NECESSARY FOR 

A time scenario ",L 

IF L=0 THEN 6170 
PRINTUSING 3970 



% 6TRIKE GRCUP NAVIGATION SGLUTICN 
PRINT 

PRINTUSING 4000 

t LEG DIST TIME TH MH TAS TOTT TCTD 
FOR 1=1 TO N 
23 ( I )=X1 n J 
29(1 ) = Y1 ( I ) 

NEXT I 



21 = N 

GOSUB '205;REM RECONVERT DEG AND TENTHS TO DEG AND MINS 
FCR 1=1 TO N 
Xl( I )=Z3( I * 

Yim = Z9(I) 



NEXT I 

FOR 1=1 TO M 



PRINT TAB(2 ) ;l ;TAB(7) ;D 1( I ) ; T AB ( 1 2 ) ; T3( IJ ; T AB ( 20) ; 

N2 ( I ) ; TAS( 25 ) ;M3 ( I ) ;TAB(29 J ; IK I ) ;TAB( 35 ) ;T2 ( I ) ;TAB (42) 
; 04 ( I ) 

PRINT "FROM ";y 1( I ) ;"/";xl (I ) ;"T0 ";y 1( I + l) ; "/";xi( I + l ) 

PRINT 

NEXT I 

FCR 1=1 TO N 
23(I)=X1(I) 

Z9(I J = Y1 (I ) 

NEXT I 



Z1=N 

GOSUB '200 ; REM CONVERT DEG AND MIN TO DEG AND TENTHS. 
FCR 1=1 TO N 
Xl( I )=Z8( I ) 

Y1(I)=Z9( I ) 

NEXT I 

ON M7 GOTO 4590,4280,5261 

REM HAVE TO CALCULATE A NAVIGATION SOLUTION FOR THE 

EA63 IF MOO ESCORT MISSION, THEN TIME SCENARIO 

GOSLB '235 

GCSUB '240 

FOR 1=1 TO M7 

Z8( I)=X2( I ) 

Z9 ( I ) =Y2 ( I ) 

NEXT I 



GOSUB '205:k£M RECCNVEkT DEG AND TENTHS TO DEG AND MINS 

FOR 1=1 TO M7 

X2(I)=Z3(I) 

Y2( n=Z9( I ) 

NEXTI 

PRINT " MCO ESCORT (vtAVIGATION SOLUTION." 

PRINT 

PRINTUSING 4C00 
FOR 1=1 TO MS 

PR INT TAB (2 ) ;I ; TA B ( 7 ) ;02( I ) (TAB ( 1 3 ) ; T6 ( I ) ; T A B (20 ) ; 

N3 (I) (TAB (25 ) ;M1 ( I ) (TAB (29) ( M2 ( I ) ( TAB ( 35 ) ( T 5 ( I ) ( TAB ( 42 ) 
• D "3 ( I ) 

print "FROM "(Y2( I ) ("/"(X2(I ) ;"/"(" TO " ( Y 2 ( I + 1 ) ( "/ " ( 
X2 (I+l ) 

PRINT 
NEXT I 

FOR 1=1 TO M9 
Z8 ( I ) = X2 ( I ) 

Z9( I )=Y2( I ) 



4510 NEXT I 
45^0 ZL=M9 

453J GCSU3 '200 : REM CONVERT DEG AND MIN TO DEG AND TENTHS. 
4540 FOR 1=1 TO M5 
4550 X2 (I)=Za (I) 

4560 Y2m=Z9( I ) 

457C NEXT I 

4580 REM NEXT SECTION BEGINS TIME SCENARIO. 

459C INPLT "DO YOU WANT A TIME SCENARIC?"tL 
4600 IF L=0 THEN 6170 

4610 PRINT "HOW MANY BANDS DO YOU WANT TO CONSIDER?" 

4620 INPUT "NO CCMBOS, 5/6 COUNTS AS 2.",N8 
4630 PRINT "EMETR BANOS, ONE AT A TIME." 

4640 FCR 1=1 TO N8 
4650 INPUT N1(I» 

4660 NEXTI 

4670 PRINT "WHICH TYPE OF EMITTERS ARE YOU INTERESTED IN 
FCR THOSE BANDS?" 

4680 INPUT "1=ALL, 2=EW/ACC ONLY, 3=TERM THREAT CNLY.",N7 
469C REM PRINT OUT HEADINGS FOR TIME SCENARIO. 

4700 PRINT " TIME PRES POS TYPE EC3 RNGE ERG AUTO 
D E G R P 5R CT " 

4710 REw' SET INITIAL CONDITIONS FOR THE TIME SOLUTION. 

4720 I F M7=2 THEN 5260 
473C S7=0. 

4740 ?8=X1( I ) 

4750 P9=Y1(I) 

4760 Z8(I)=P3 
477C Z9(I)=P9 
4780 Zl=l 

479C G0SU3 '205:REM RECONVERT DEG AND TENTHS TO DEG AND MINS 
4800 P8=Z8<I) 

4810 P9 = Z9(n 
432C PRINT S7;P9;"/";P8 
4830 Z8 ( I) =P8 
484C Z9(IJ=P9 

4860 G03U3 '200 : REM CONVERT DEG AND MINS TO DEG AND TENTHS 
4370 P3 = Z3( I ) 

4380 P9=Z9(I) 

4890 G0SU3 *245 : REM. NOW PROCEED ARCUNC THE ROUTE AT ONc 
MINUTE INTERVALS. 



TURNPCINT? 



4900 1=1 
4910 S7=S7+1. 

4930 IF T2(i)^GT*. S7 THEN 5070 : REM NOT TRUE MEANS TP WAS 
LE. ONE MINUTE FROM LAST COMPUTED POSITION. 

4940 P7 = S7-T2 ( I ) 

4950 1=1+1 : REM IS THIS THE LaSi 
4960 IF I=N THEN 5030 
4970 P8=X1(I) 

4980 ?9=Y1 ( I ) 

4990 G0SL3 '246 : REM CONVERT DEG TO RACNS. 

5000 P8=P3+P7*S3 ( I ) /60. *COS ( H) 

5010 P9 = P9+P7*S3( I)/60.=*SIN(H) 

5020 GOTO 5100 : REM IT WAS THE LAST TURNPCINT. 

5030 ?a=Xl(N) 

504C P9=Y1(N) 

5050 S7=T2(M) 

5060 GOTO 5100 
TURNPOIMT , 

5070 G0SU8 '246 
5030 PS=P3+D9-C0S IH) 

5090 P9 = P9 + D9“S IN (H) 

5100 Z8(I)=P8 
5110 Z9HJ=P9 

5130 GOSUB '205:REK RECCNVERT DEG AND TENTHS TO' DEG AND MINS 

514C PS=Z8(1) 

5150 P9=Z9( 1 ) 

5160 PRINT S7;P9;"/";P8 
5170 Z8(1)=P3 



; REM NEXT SECTION McANS HAVE NOT C-CNE PAST A 
JUST increment FOR THIS LEG AMO CCNTINUE. 

- REM CCNVERT 06G TO RACNS. 



5160 Z9(1)=P9 
5190 Zl=l 

5200 3CSUS *200 : REM CONVERT 053 AND MNS TO DEG AND TENTHS 
5210 P3=Z3{1) 

522C P9=Z9(1) 

5230 G0SU3 *245 

524C IF S7 GE. T2(M) THEN 6170 
5250 GOTO 4910 

5260 LOAD OC F "MAIN4" 

5261 Ve=999 

5262 LOAD OC F "MAIN4" 



PART FCUP 'MAIN4" 



5263 

5264 
5270 
528C 
5290 
53J0 
5310 
5320 
533 0 
5340 
5350 
5360 
5370 
5380 
5390 
5400 
5^+1 0 
5420 

543 0 

544 0 
5450 
5460 
5470 
54 8 0 
5490 
550 0 
5510 
5520 
5530 
554 0 
5550 
536 0 
5570 
5530 
5590 
56 0 0 
5610 
5620 
563 0 
5640 

56 50 
566 0 
5670 
5680 
5690 
5700 
5710 

57 2 0 
5730 
5740 
5750 
5760 
5770 
5780 
5790 
5800 
5310 
5320 
583 0 
5340 
5850 
5860 
5870 
5330 
5390 
5900 
5910 
5920 



IF V8=999 THEN 5290 
S7 = C. 

P8=X2( 1 ) 

P9=V2( 1) 

X7=X1( 1 ) 

Y6=Y1(1) 

Z8(1)=P3 
Z9 (1)=P9 
Zl = l 

GOSUB '205:REM RECONVERT DEG AND TENTHS TO CEO AND MINS 
P8=Z8(1) 

P9=Z9( 1) 

PRINT S7;P9 ;»/'‘;P8 
Z3(1I=P3 
Z9 (1)=P9 
Zl = l 

GOSUB *200 : REH CONVERT DEG AND MINS TO DEG AND TENTHS 
?3=Zd( 1 J 
P9=Z9( 1} 

GCSUB '245 
1 = 1 
J = 1 

57=S7+1. 

D9=S3( I ) /60. 

08 = S5( I) /60. 

IF T2(I) GT. S7 then 5630 
P7=S7-T2( I ) 
i= I + l . 

IF I=N THEN 5600 
X7=X1(I ) 

Y6 = Y1I I ) 

GOSUB '246 : REM CCiNVERT THOG TO RACN. 

X7 = X7+P7*S3(I)/6 0.>!=CCS(H) 

Y6 = Y6+P7^S3( IJ/60.=^SIN(H) 

GOTO 5660 
X7=X1( N) 

Y6=Y1( N) 

GOTO 5660 

GCSUB '246 : REM CONVERT THDG TO RADN. 

X7=X7+09*C0S(H) 

Y6=Y6+D9*S IN (H) 

IF T5(J) GT. S7 THEM 5790 
P7=S7-T5( J) 



J = J + 1 

IF J=M9 THEN 5760 
P3=X2( J ) 

P9=Y2(J) 

GOSUB '248 I REM CONVERT THDG lO RACN. 
P8 = P8+P7=«'S5( J) /6 0.^COS(H) 

P9=P9+P7*S5( J)/60. *SiN(H) 

GOTO 5820 
P8=X2 (M9 ) 

P9=Y2( M9 ) 

GOTO 5820 

oCSUB '248 : REM CONVERT THDG TO RADN. 
?S=P8+08=fC0S ( F) 

P9 = P9+D8’!'S IN (H ) 

Zo(l)=P8 
Z9( 1)=P9 



GO^UB »205:REM RECONVERT DEG AND TENTHS TO DEG AND MINS 
P8=Z3( 1 ) 



P9=Z9( 1) 

PRINT S7;P9;"/";P8 
GOSUB '245 

IF S7 GT. T5(M8) THEN 6170 

f NPUT^"^”DO YOU WANT A PRINT OUT OF JAMMING 



PARAMETERS 



F0(^ THIS STANCOFF PCINT?»,L 
5930 IF L=0 THEN 6170 

594 J PRINT "HOW .''AMY BANOS DC YOU WANT TO CONSIDER?" 

5950 INPUT "NO CCMBOS, 5/6 COUNTS AS 2.'SN8 
5960 PRINT "ENTER BANOSt ONE AT A TIME." 

597J FCR 1=1 TO N8 
5930 INPUT N1 ( I ) 

599C NEXT I 

6000 PRINT "WHICH TYPE CF EMITTERS ARE YOU INTERESTED IN 
FOR THOSE BANCS?" 

oOlO INPUT "1=ALL» 2=EW/ACC ONLY, 3"TERM THREAT CNLY.",N7 
6020 PRINT "STANDOFF L/L TYPE =06 RNGE ERG AUTO CEGR PERCT" 
o030 Za{l)=S9 
6040 Z9(1)=S3 
6050 Zl=l 

6060 GOSUB '205:R£M RECONVERT DEG AND TENTHS TO DEG AND MNS 
6070 S9=Z8(1) 

6080 S8=Z9(li 
6090 PRINT S8;"/";S9 
6100 Z8(1)=S9 
6110 Z9{1)=S8 

6I3C GciuB '200 : REM CONVERT DEG AND FINS TO DEG ANC TENTHS 
6140 S9=Z8(1) 

6150 S8=Z9(1) 

6160 GOSUB '245 
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